home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TeX 1995 July
/
TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO
/
macros
/
latex209
/
contrib
/
nfss-addons
/
nfsslint.sty
< prev
next >
Wrap
Text File
|
1992-05-22
|
3KB
|
94 lines
%%% ====================================================================
%%% @LaTeX-style-file{
%%% author = "Mario Wolczko",
%%% version = "2",
%%% date = "21 May 1992",
%%% time = "20:59:01 BST",
%%% filename = "nfsslint.sty",
%%% address = "Dept of Computer Science
%%% The University of Manchester
%%% Oxford Road
%%% Manchester M13 9PL
%%% UK",
%%% telephone = "+44-61-275-6146",
%%% FAX = "+44-61-275-6236",
%%% checksum = "25494 93 315 3067",
%%% email = "mario@cs.man.ac.uk (Internet)",
%%% codetable = "ISO/ASCII",
%%% keywords = "LaTeX, NFSS, fonts",
%%% supported = "yes",
%%% docstring = "For New Font Selection Scheme users --
%%% warns of possible font problems in pre-NFSS files.",
%%% }
%%% ====================================================================
%
% If you have switched to the NFSS, but have pre-NFSS documents, this
% style option will tell you when latexing those documents using NFSS
% may change the appearance.
%
% Example: if in a document you had
% \bf foo \sf bar
% then prior to NFSS ``bar'' would be in mediumweight sans-serif, but
% using NFSS it would be in bold sans. If you add nfsslint as a style
% option, you will get a warning something like this:
% nfsslint: possible unexpected font in use of \sf on line 42
\@ifundefined{extract@font}
{\@warning{The style option `nfsslint' is ignored
-- you are not using the new font selection scheme.}
\endinput}
{}
\let\@prelint@tt\tt
\let\@prelint@rm\rm
\let\@prelint@sf\sf
\let\@prelint@sc\sc
\let\@prelint@it\it
\let\@prelint@bf\bf
\let\@prelint@sl\sl
\def\@lintwarn#1{\@warning{nfsslint: possible unexpected font in use
of \string#1}}
% warn if not default series and shape
\def\rm{%
\ifx\f@series\default@series % series OK
\ifx\f@shape\default@shape\else\@lintwarn\rm\fi
\else\@lintwarn\rm\fi
\@prelint@rm}
\def\sf{%
\ifx\f@series\default@series % series OK
\ifx\f@shape\default@shape\else\@lintwarn\sf\fi
\else\@lintwarn\sf\fi
\@prelint@sf}
\def\tt{%
\ifx\f@series\default@series % series OK
\ifx\f@shape\default@shape\else\@lintwarn\tt\fi
\else\@lintwarn\tt\fi
\@prelint@tt}
% warn if not default family and shape
\def\bf{%
\ifx\f@family\default@family % family OK
\ifx\f@shape\default@shape\else\@lintwarn\bf\fi
\else\@lintwarn\bf\fi
\@prelint@bf}
% warn if not default family and series
\def\it{%
\ifx\f@family\default@family % family OK
\ifx\f@series\default@series\else\@lintwarn\it\fi
\else\@lintwarn\it\fi
\@prelint@it}
\def\sl{%
\ifx\f@family\default@family % family OK
\ifx\f@series\default@series\else\@lintwarn\sl\fi
\else\@lintwarn\sl\fi
\@prelint@sl}
\def\sc{%
\ifx\f@family\default@family % family OK
\ifx\f@series\default@series\else\@lintwarn\sc\fi
\else\@lintwarn\sc\fi
\@prelint@sc}